﻿Public Class frmChangeLog

    Private Sub frmChangeLog_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Try
            With Me.RichTextBox1
                .LoadFile(Application.StartupPath & "/ChangeLog.txt", RichTextBoxStreamType.PlainText)

            End With
        Catch ex As Exception
            MsgBox(ex.Message())
        End Try
    End Sub
    Private Sub BtnClose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnClose.Click
        Me.Dispose()
    End Sub
End Class